Imports Microsoft.VisualStudio.DebuggerVisualizers
'TODO - developers you must place your DebuggerVisualizer attribute(s) here.
'
'use this attribute if you do not need a custom data source
'
'<Assembly: System.Diagnostics.DebuggerVisualizer(GetType(SampleStringVisualizer.StringVisualizer), GetType(Microsoft.VisualStudio.DebuggerVisualizers.VisualizerObjectSource), Target:=GetType(System.String), Description:="Sample String Visualizer")> 
'
'
'use this attribute fi you want to use a custom data source
'
<Assembly: System.Diagnostics.DebuggerVisualizer( _
    GetType(SampleStringVisualizer.StringVisualizer), _
    GetType( _
    SampleStringVisualizer.StringVisualizerObjectSource), _
    Target:=GetType(System.String), _
    Description:="Sample String Visualizer")> 

'
Public Class StringVisualizer
    Inherits DialogDebuggerVisualizer

    Protected Overrides Sub Show(ByVal windowService _
        As _
        Microsoft.VisualStudio.DebuggerVisualizers.IDialogVisualizerService, _
        ByVal objectProvider As _
        Microsoft.VisualStudio.DebuggerVisualizers.IVisualizerObjectProvider)
        Using frm As New frmStringVisualizer
            frm.ObjectProvider = objectProvider
            frm.StringToVisualize = CType( _
                objectProvider.GetObject, String)
            windowService.ShowDialog(frm)
        End Using

    End Sub

End Class
